 0 VALUE 'LevelData 0 VALUE Level         0 VALUE Column
 0 VALUE Row        0 VALUE OrbCount      0 VALUE BallRow   
 0 VALUE BallCol    0 VALUE RobotRow      0 VALUE RobotCol
-1 VALUE Ball       0 VALUE #Collected
84 VALUE BallChar   0 VALUE IsPlayer?     0 VALUE Score
 0 VALUE Lives     -1 VALUE JoystickMode? 0 VALUE Time
31 VALUE TimeCol    0 VALUE Frame#        0 VALUE FrameCount
-1 VALUE Speech?    0 VALUE FlashOrbs?
  1 CONSTANT Fire?  2 CONSTANT Left?      4 CONSTANT Right?
  8 CONSTANT Down? 16 CONSTANT Up?      $90 CONSTANT EmptyChar
$98 CONSTANT OrbChar 13 CONSTANT ENTER  448 CONSTANT TimeReset
400 CONSTANT DelayTime
-->




HEX : BrickUDG ( --) DATA 10  
  7FAA D5A8 D0A0 C080  8080 8080 8080 807F
  FEA9 4101 0101 0101  0101 0101 0101 01FE  80 DCHAR ;
: BallUDG1 ( --)     DATA 10  
  030F 3F3F 5F5F 9F00  8E8E 4640 2030 0C02
  4070 3C4C 6676 7F7F  00FF FEF2 040C 30C0  84 DCHAR ;
: BallUDG2 ( --)     DATA 10
  030F 3F3F 5F47 991E  8E8D 4541 2030 0C02
  C0F0 ACCC C6B6 BF7F  7F9F E6F2 040C 30C0  84 DCHAR ;
: BallUDG3 ( --)     DATA 10
  030F 2F37 7B5D 9E1E  8C8B 4741 0030 0C03
  C0F0 BCC8 E6E6 DF3F  7F7F BEC2 0404 30C0  84 DCHAR ;
: BallUDG4 ( --)     DATA 10
  030B 3D3D 5D5E 9E9E  8887 0741 4030 0C03
  C0F0 DCCC E6F4 E31F  7F7F 7EB2 040C 10C0  84 DCHAR ;
-->




: RobotUDG1 ( --)    DATA 10
  609F 9F61 03FF 80AA  9FB5 90B5 9FAA 80FF
  06F9 F986 C0FF 01A9  FD59 0D59 FDA9 01FF  88 DCHAR ;
: RobotUDG2 ( --)    DATA 10
  1D22 221D 03FF D5BF  EAB0 E5B0 EABF D5FF
  B8F4 F4B8 C0FF 55FF  AD07 4D07 ADFF 55FF  88 DCHAR ;
: RobotUDG3 ( --)    DATA 10
  0708 0807 03FF FFD5  E0CA E7CA E0D5 FFFF
  E010 10E0 C0FF FF57  03A7 F3A7 0357 FFFF  88 DCHAR ;
: RobotUDG4 ( --)    DATA 10
  1D2F 2F1D 03FF AAC0  95CF 95CF 95C0 AAFF
  B844 44B8 C0FF AB01  53F9 5BF9 5301 ABFF  88 DCHAR ;
: OrbUDG ( --)       DATA 10
  0000 0000 0304 0808  0808 0403 0000 0000
  0000 0000 C020 9050  1010 20C0 0000 0000  98 DCHAR ;
: EmptyUDG  ( --) DATA 4 FFFF FFFF FFFF FFFF  90 DCHAR ; -->




: BarUDG2   ( --)  DATA 4 $0000 $C0C0 $C0C0 $0000 
  2DUP A0 DCHAR A8 DCHAR ;
: BarUDG4   ( --)  DATA 4 $0000 $F0F0 $F0F0 $0000
  2DUP A1 DCHAR A9 DCHAR ;
: BarUDG6   ( --)  DATA 4 $0000 $FCFC $FCFC $0000
  2DUP A2 DCHAR AA DCHAR ;
: BarUDG8   ( --)  DATA 4 $0000 $FFFF $FFFF $0000
  2DUP A3 DCHAR AB DCHAR ;
: YouWin    ( --)  DATA 1 $7DDB SAY ;
: GoodWork  ( --) DATA 1 $30FA SAY ;
: WellDone  ( --) DATA 2 $7717 $253E SAY ;
: VeryGood  ( --) DATA 2 $74DA $30D6 SAY ;
: WWT?      ( --) DATA 1 77E9 SAY ;
: TryAgain  ( --) DATA 1 700F SAY ;
: OutOfTime ( --) DATA 3 4DD4 4BBA 6E69 SAY ;
: STTA      ( --) DATA 3 63F7 6C73 700F SAY ; -->




: Hurry     ( --) DATA 3 3757 3757 3757 SAY ;
: Completed ( --) 3 RND CASE
    0 OF DATA 2 1F1A 1FCD ENDOF
    1 OF DATA 3 4B7D 3B8A 253E ENDOF
    2 OF DATA 6 39BD 1FCD 767D 473D 5231 4C41 ENDOF
    ENDCASE  SAY ;
: GoGoGo    ( --) TALKING? NOT IF DATA 3 2FFC 2FFC 2FFC SAY 
  THEN ;
: Joystick Speech? IF DATA 3 3AED 3A32 4C41 SAY THEN ;
: Keyboard Speech? IF DATA 3 3BE9 3A32 4C41 SAY THEN ;
DECIMAL
CREATE WinPhrases  ' YouWin ,   ' GoodWork ,   ' WellDone ,
                   ' VeryGood ,
CREATE LosePhrases ' WWT? ,    ' TryAgain ,    ' OutOfTime ,
                   ' STTA ,
-->




: DefineGraphics ( --)   1 GMODE  FALSE SSCROLL !
  32 0 DO I 1 14 COLOR LOOP
  16  1 15 COLOR   17  4 15 COLOR   18 15 14 COLOR
  19  1 15 COLOR   21  3 14 COLOR
  BrickUDG  BallUDG1  RobotUDG1  OrbUDG  EmptyUDG 
  BarUDG2   BarUDG4   BarUDG6    BarUDG8 ;
: NextColumn ( --) 2 +TO Column ;
: DrawIt ( a b c d --)
    Column 1+ Row 1+ GOTOXY  EMIT \ d
    Column 1+ Row    GOTOXY  EMIT \ c
    Column    Row 1+ GOTOXY  EMIT \ b
    Column    Row    GOTOXY  EMIT \ a
    NextColumn ;
: DrawBrick ( --) 128 129 130 131 DrawIt ;
: DrawBall  ( --) 132 133 134 135 DrawIt ;
: DrawRobot ( --) 136 137 138 139 DrawIt ; -->





: DrawOrb   ( --) 152 153 154 155 DrawIt ;
: DrawEmpty ( --) 144 144 144 144 DrawIt ;
: C@++ ( addr -- val addr+1) DUP C@ SWAP 1+ ;
: InfoPanel ( --) 0 18 GOTOXY ." Time"   TRUE ZEROS !
  0 19 GOTOXY ." Score:" Score U.  FALSE ZEROS !
  25 19 GOTOXY ." Lives:" Lives 1- .  0 20 GOTOXY ." Level:"
  Level 1+ .  18 4 $AB 28 HCHAR ;
: DecodeLevel ( level --) 38 * 'LevelData + 
  C@++ C@++ -ROT   16 /MOD 2* TO RobotRow  2* TO RobotCol
  16 /MOD 2* TO BallRow  2* TO BallCol  0 TO Row  0 TO OrbCount
  9 0 DO  0 TO Column  4 0 DO  C@++ SWAP  DUP $03 AND  OVER 2 
  >> $03 AND  2 PICK 4 >> $03 AND  3 PICK 6 >> $03 AND  4 0 DO
  CASE  0 OF DrawEmpty ENDOF  1 OF DrawBrick ENDOF  2 OF DrawOrb
  1 +TO OrbCount ENDOF  ENDCASE  LOOP  DROP  LOOP  2 +TO Row  
  LOOP  DROP  InfoPanel BallRow  TO Row   BallCol TO Column  
  DrawBall RobotRow TO Row  RobotCol TO Column  DrawRobot ; -->

  
  
  
CREATE BallFrames  ' BallUDG1 ,   ' BallUDG2 ,   ' BallUDG3 ,
                   ' BallUDG4 ,  
CREATE RobotFrames ' RobotUDG1 ,  ' RobotUDG2 ,  ' RobotUDG3 ,
                   ' RobotUDG4 ,
: Tick ( --)  18 TimeCol GCHAR DUP  $A8 = IF DROP $AB  18 
  TimeCol 32 1 HCHAR  -1 +TO TimeCol  ELSE 1- THEN 
  18 TimeCol ROT 1 HCHAR  Time 100 = IF Speech? IF Hurry THEN
  21 8 14 COLOR TRUE TO FlashOrbs? THEN ;
: CheckTime ( --)  -1 +TO Time  Time 4 MOD 0= IF Tick THEN ;
: Bonus ( --)  Time 0> IF TRUE ZEROS !  1000 \ sound parameter
  Time 4 /  1 DO  Tick  5 +TO Score  6 19 GOTOXY Score U.
  DUP 7 0 SOUND 8 -  DUP 8 -  7 1 SOUND  LOOP  DROP
  0 15 0 SOUND  0 15 1 SOUND  4 18 GOTOXY SPACE ZEROS 0! THEN ;
: Animate ( --) Ball IsPlayer? = IF BallFrames  Frame# CELLS +
  @ EXECUTE ELSE RobotFrames Frame# CELLS + @ EXECUTE THEN 
  Frame# 1+ 4 MOD TO Frame# ; -->


  
  

: ScanKeyboard ( -- direction)
  KEY? DUP -1 <> IF CASE  ASCII S OF  2 ENDOF
  ASCII D OF  4 ENDOF  ASCII X OF  8 ENDOF 
  ASCII E OF 16 ENDOF  ENTER   OF  1 ENDOF
  0 ( default case) ENDCASE ELSE DROP  0 THEN ;
: GetRowCol ( --) Ball IsPlayer? = IF BallRow  BallCol ELSE
  RobotRow  RobotCol THEN TO Column   TO Row ;
: SetRowCol ( --) Row Column  Ball IsPlayer? = IF TO BallCol
  TO BallRow ELSE TO RobotCol  TO RobotRow THEN ;
: ErasePlayer ( --) DrawEmpty -2 +TO Column ;
: DrawPlayer ( --) Ball IsPlayer? = IF DrawBall ELSE DrawRobot
  THEN -2 +TO Column ;
: CheckOrb ( --) Row Column GCHAR OrbChar = IF 1 +TO #Collected
  10 +TO Score TRUE ZEROS !  6 19 GOTOXY Score U.  ZEROS 0!
  THEN ;
: Delay ( delay--) 0 DO LOOP ; -->




: CanMove? ( row col--true/false) GCHAR Ball IsPlayer? = IF 
  DUP EmptyChar = SWAP OrbChar =  OR ELSE EmptyChar = THEN ;
: MoveLeft ( --) BEGIN GetRowCol Row Column 2- CanMove? WHILE
  ErasePlayer  -2 +TO Column  CheckOrb DrawPlayer SetRowCol  
  DelayTime Delay  Animate  REPEAT ;
: MoveRight ( --) BEGIN GetRowCol Row Column 2+ CanMove? WHILE
  ErasePlayer  2 +TO Column  CheckOrb DrawPlayer SetRowCol  
  DelayTime Delay  Animate REPEAT ;
: MoveDown ( --) BEGIN GetRowCol Row 2+ Column CanMove? WHILE 
  ErasePlayer  2 +TO Row  CheckOrb DrawPlayer SetRowCol  
  DelayTime Delay  Animate  REPEAT ;
: MoveUp ( --) BEGIN GetRowCol Row 2- Column CanMove? WHILE
  ErasePlayer  -2 +TO Row  CheckOrb DrawPlayer SetRowCol  
  DelayTime Delay  Animate  REPEAT ;
: Debounce ( --) JoystickMode? IF BEGIN 0 JOYST 0= UNTIL ELSE
  BEGIN KEY? -1 = UNTIL  THEN ; -->

  
  
  
: BusyNoise ( --) 50 0 DO 50  15 0 DO  DUP I 0 SOUND 10 + LOOP
  DROP LOOP 0 15 0 SOUND ;
: MovePlayer ( --) JoystickMode? IF 0 JOYST ELSE ScanKeyboard
  THEN  CASE Left?  OF  MoveLeft  ENDOF  Right? OF  MoveRight
  ENDOF  Down?  OF  MoveDown  ENDOF Up?    OF  MoveUp   ENDOF
  Fire?  OF  IsPlayer? NOT TO IsPlayer?  Debounce BusyNoise 
  Completed ENDOF  ENDCASE ;
: AllOrbs? ( -- true/false) OrbCount #Collected = ;
: SayEnd ( --) Speech? IF  AllOrbs? IF WinPhrases ELSE 
  LosePhrases THEN  THEN  4 RND CELLS + @ EXECUTE ;
: Reset ( --) 21 3 14 COLOR   19 1 15 COLOR   0 TO FrameCount
  TimeReset TO Time  31 TO TimeCol  0 TO #Collected
  0 TO Frame#  Ball TO IsPlayer?  FALSE TO FlashOrbs? ;
: GameOver ." Game Over Sucker!" ; 
: Wow! ." You completed the game!" ;
: FlashOrbs ( --) 19 16 RND 15 COLOR ; -->






: Wipe ( --) 32 24  23 0 DO 0 I 3 PICK 3 PICK PANEL  0 SCROLL
  6 SCROLL    1- SWAP 1- SWAP  LOOP   6 SCROLL 2DROP ;
: Game ( --) DefineGraphics  0 TO Level  3 TO Lives  
  0 TO Score BEGIN Lives 0>  Level 25 <  AND WHILE
  Reset  Level DecodeLevel GoGoGo  BEGIN  MovePlayer
  1 +TO FrameCount  FrameCount 70 MOD 0= IF  Animate
  CheckTime THEN  FlashOrbs? IF FlashOrbs THEN  AllOrbs? Time
  4 = OR UNTIL  SayEnd  Time 4 = IF -1 +TO Lives ELSE Bonus  
  1 +TO Level THEN  Wipe  REPEAT  Lives 0= IF GameOver ELSE 
  Wow! THEN ;
: SlideScreen ( block# --)  0 4 32 16 PANEL  BLOCK  32 0 DO
  0 SCROLL  16 0 DO  31 I 4 + GOTOXY  DUP I 64 * + V@ EMIT
  LOOP  1+  LOOP DROP ;
: AnyKey ( --)  ASCII > 256 *  32 +   0 BEGIN  1+ DUP  50 MOD
  0= IF SWAP  ><  DUP 31 19 GOTOXY EMIT  SWAP  THEN  KEY? 1+
  0 JOYST  1 = OR  UNTIL  2DROP ;  -->
  
  
  
  
: BrickRows  ( --) 0 TO Row  2 0 DO  0 TO Column  2 0 DO  
  16 0 DO DrawBrick LOOP  2 +TO Row   0 TO Column  LOOP 
  20 TO Row  LOOP ;
: GetControlMode ( --)  6 BLOCK  15 64 * +  15 0 DO 
  32 0 DO  DUP V@  I 4 GOTOXY EMIT  1+  LOOP  6 SCROLL
  32 -  64 -   LOOP DROP  BEGIN  KEY? DUP  ASCII J =  SWAP
  ASCII K =  OR UNTIL   KEY? ASCII J = IF TRUE Joystick ELSE
  FALSE Keyboard THEN TO JoystickMode?  Wipe ;
: DarkStar ( --)  DefineGraphics  BrickRows  7 2 DO I BLOCK 
  DROP LOOP  6 2 DO I SlideScreen AnyKey LOOP  GetControlMode 
  Game ;
HERE TO 'LevelData
  .( Loading level data)  -->

 


17 C, 30 C,  \ level 1
85 C, 85 C, 85 C, 85 C, 69 C, 0 C, 0 C, 145 C, 64 C, 0 C, 
2 C, 21 C, 64 C, 0 C, 88 C, 1 C, 64 C, 82 C, 0 C, 5 C, 82 C, 
8 C, 0 C, 129 C, 72 C, 0 C, 37 C, 33 C, 64 C, 5 C, 128 C, 
9 C, 85 C, 85 C, 85 C, 85 C,
30 C, 86 C,  \ level 2
16 C, 68 C, 64 C, 69 C, 64 C, 128 C, 0 C, 1 C, 1 C, 129 C, 
128 C, 128 C, 68 C, 128 C, 8 C, 17 C, 0 C, 4 C, 8 C, 4 C, 
64 C, 17 C, 8 C, 1 C, 1 C, 4 C, 64 C, 105 C, 64 C, 0 C, 0 C, 
4 C, 16 C, 64 C, 0 C, 16 C, 
30 C, 46 C,  \ level 3
85 C, 85 C, 85 C, 85 C, 64 C, 0 C, 0 C, 145 C, 64 C, 80 C, 
0 C, 81 C, 64 C, 96 C, 2 C, 1 C, 72 C, 0 C, 148 C, 9 C, 70 C, 
8 C, 36 C, 37 C, 69 C, 134 C, 8 C, 149 C, 96 C, 5 C, 128 C, 
1 C, 85 C, 85 C, 85 C, 85 C, 
-->



125 C, 30 C,  \ level 4
85 C, 85 C, 85 C, 85 C, 64 C, 0 C, 0 C, 17 C, 64 C, 4 C, 
0 C, 1 C, 89 C, 137 C, 153 C, 153 C, 68 C, 98 C, 68 C, 69 C, 
89 C, 152 C, 153 C, 153 C, 64 C, 4 C, 0 C, 1 C, 64 C, 64 C, 
0 C, 65 C, 85 C, 85 C, 85 C, 85 C, 
17 C, 110 C,  \ level 5
21 C, 85 C, 85 C, 84 C, 64 C, 64 C, 65 C, 1 C, 65 C, 132 C, 
130 C, 17 C, 80 C, 0 C, 65 C, 1 C, 97 C, 144 C, 0 C, 5 C, 
80 C, 1 C, 33 C, 1 C, 100 C, 17 C, 16 C, 17 C, 64 C, 64 C, 
36 C, 25 C, 21 C, 85 C, 85 C, 84 C, 
65 C, 113 C,  \ level 6
0 C, 85 C, 85 C, 85 C, 1 C, 2 C, 1 C, 137 C, 4 C, 2 C, 0 C, 
69 C, 16 C, 2 C, 0 C, 1 C, 64 C, 2 C, 0 C, 1 C, 80 C, 2 C, 
4 C, 5 C, 64 C, 2 C, 0 C, 65 C, 65 C, 2 C, 5 C, 129 C, 85 C, 
85 C, 85 C, 85 C, 
-->





115 C, 122 C,  \ level 7
85 C, 85 C, 85 C, 85 C, 64 C, 0 C, 0 C, 1 C, 20 C, 84 C, 
24 C, 89 C, 24 C, 24 C, 68 C, 68 C, 4 C, 16 C, 84 C, 80 C, 
20 C, 16 C, 100 C, 100 C, 64 C, 0 C, 0 C, 1 C, 64 C, 96 C, 
0 C, 25 C, 85 C, 85 C, 85 C, 85 C, 
108 C, 98 C,  \ level 8
85 C, 85 C, 85 C, 84 C, 66 C, 80 C, 0 C, 5 C, 65 C, 129 C, 
72 C, 1 C, 66 C, 81 C, 24 C, 1 C, 80 C, 1 C, 65 C, 145 C, 
81 C, 0 C, 2 C, 97 C, 98 C, 64 C, 129 C, 17 C, 80 C, 0 C, 
0 C, 1 C, 21 C, 85 C, 85 C, 85 C, 
30 C, 72 C,  \ level 9
4 C, 85 C, 85 C, 84 C, 25 C, 128 C, 1 C, 1 C, 98 C, 64 C, 
32 C, 4 C, 17 C, 9 C, 66 C, 65 C, 65 C, 134 C, 32 C, 9 C, 
64 C, 9 C, 64 C, 4 C, 102 C, 0 C, 0 C, 16 C, 64 C, 0 C, 0 C, 
64 C, 85 C, 85 C, 85 C, 0 C, 



 
  
93 C, 36 C,  \ level 10
0 C, 85 C, 85 C, 84 C, 85 C, 32 C, 0 C, 1 C, 64 C, 5 C, 98 C, 
73 C, 72 C, 6 C, 24 C, 4 C, 64 C, 4 C, 32 C, 73 C, 102 C, 
4 C, 144 C, 68 C, 24 C, 5 C, 65 C, 80 C, 64 C, 0 C, 4 C, 
68 C, 21 C, 85 C, 80 C, 65 C, 
30 C, 108 C,  \ level 11
85 C, 85 C, 85 C, 85 C, 64 C, 1 C, 0 C, 1 C, 65 C, 160 C, 
2 C, 133 C, 80 C, 32 C, 20 C, 9 C, 96 C, 6 C, 104 C, 21 C, 
81 C, 64 C, 20 C, 1 C, 96 C, 146 C, 0 C, 9 C, 89 C, 80 C, 
4 C, 5 C, 20 C, 85 C, 85 C, 84 C, 
17 C, 92 C,  \ level 12
80 C, 1 C, 65 C, 84 C, 69 C, 86 C, 21 C, 37 C, 64 C, 40 C, 
0 C, 129 C, 69 C, 5 C, 129 C, 145 C, 68 C, 133 C, 97 C, 65 C, 
69 C, 5 C, 1 C, 17 C, 64 C, 8 C, 0 C, 1 C, 64 C, 0 C, 32 C, 
1 C, 85 C, 85 C, 85 C, 85 C, 
-->





18 C, 113 C,  \ level 13
21 C, 85 C, 85 C, 84 C, 65 C, 0 C, 0 C, 133 C, 68 C, 6 C, 
2 C, 81 C, 64 C, 0 C, 128 C, 17 C, 72 C, 0 C, 0 C, 25 C, 
68 C, 0 C, 32 C, 1 C, 80 C, 0 C, 136 C, 25 C, 64 C, 64 C, 
33 C, 17 C, 21 C, 85 C, 85 C, 84 C, 
36 C, 50 C,  \ level 14
85 C, 85 C, 85 C, 85 C, 102 C, 0 C, 0 C, 153 C, 73 C, 0 C, 
1 C, 65 C, 64 C, 0 C, 2 C, 1 C, 64 C, 0 C, 36 C, 1 C, 64 C, 
2 C, 0 C, 1 C, 73 C, 0 C, 0 C, 65 C, 102 C, 0 C, 0 C, 153 C, 
85 C, 85 C, 85 C, 85 C, 
51 C, 76 C,  \ level 15
21 C, 84 C, 85 C, 84 C, 64 C, 9 C, 0 C, 33 C, 68 C, 132 C, 
16 C, 33 C, 64 C, 64 C, 104 C, 97 C, 17 C, 1 C, 32 C, 17 C, 
96 C, 0 C, 16 C, 97 C, 16 C, 0 C, 128 C, 4 C, 96 C, 0 C, 
0 C, 9 C, 21 C, 85 C, 85 C, 84 C, 
-->





35 C, 19 C,  \ level 16
85 C, 85 C, 85 C, 85 C, 80 C, 98 C, 0 C, 9 C, 96 C, 152 C, 
0 C, 5 C, 81 C, 80 C, 8 C, 5 C, 80 C, 2 C, 100 C, 1 C, 104 C, 
0 C, 9 C, 129 C, 82 C, 0 C, 85 C, 129 C, 89 C, 4 C, 0 C, 
1 C, 85 C, 85 C, 85 C, 85 C, 
29 C, 124 C,  \ level 17
85 C, 85 C, 85 C, 85 C, 73 C, 0 C, 0 C, 65 C, 68 C, 38 C, 
152 C, 17 C, 64 C, 25 C, 100 C, 129 C, 73 C, 0 C, 2 C, 65 C, 
66 C, 96 C, 9 C, 1 C, 68 C, 17 C, 100 C, 17 C, 64 C, 33 C, 
128 C, 1 C, 85 C, 85 C, 85 C, 85 C, 
115 C, 26 C,  \ level 18
85 C, 85 C, 85 C, 85 C, 72 C, 2 C, 1 C, 1 C, 65 C, 152 C, 
6 C, 1 C, 64 C, 100 C, 1 C, 129 C, 64 C, 129 C, 2 C, 97 C, 
70 C, 64 C, 73 C, 1 C, 73 C, 132 C, 132 C, 1 C, 100 C, 4 C, 
0 C, 65 C, 85 C, 85 C, 85 C, 85 C, 
-->




126 C, 110 C,  \ level 19
85 C, 85 C, 85 C, 85 C, 96 C, 20 C, 0 C, 89 C, 68 C, 16 C, 
0 C, 97 C, 73 C, 2 C, 80 C, 129 C, 68 C, 1 C, 128 C, 1 C, 
64 C, 16 C, 36 C, 1 C, 69 C, 36 C, 88 C, 17 C, 73 C, 24 C, 
0 C, 81 C, 85 C, 85 C, 85 C, 85 C, 
77 C, 66 C,  \ level 20
85 C, 85 C, 85 C, 85 C, 64 C, 152 C, 0 C, 1 C, 88 C, 36 C, 
88 C, 5 C, 68 C, 72 C, 4 C, 17 C, 64 C, 65 C, 65 C, 9 C, 
68 C, 16 C, 33 C, 17 C, 80 C, 37 C, 24 C, 37 C, 64 C, 0 C, 
38 C, 1 C, 85 C, 85 C, 85 C, 85 C, 
103 C, 105 C,  \ level 21
85 C, 85 C, 85 C, 85 C, 69 C, 64 C, 8 C, 5 C, 64 C, 64 C, 
0 C, 69 C, 64 C, 88 C, 0 C, 33 C, 66 C, 0 C, 128 C, 133 C, 
64 C, 16 C, 5 C, 97 C, 66 C, 32 C, 2 C, 41 C, 85 C, 85 C, 
85 C, 85 C, 0 C, 0 C, 0 C, 0 C, 
-->





103 C, 105 C,  \ level 22
85 C, 85 C, 85 C, 85 C, 100 C, 25 C, 24 C, 17 C, 64 C, 16 C, 
0 C, 1 C, 96 C, 16 C, 96 C, 129 C, 81 C, 128 C, 2 C, 21 C, 
72 C, 64 C, 86 C, 1 C, 64 C, 4 C, 64 C, 129 C, 85 C, 85 C, 
85 C, 85 C, 0 C, 0 C, 0 C, 0 C, 
103 C, 105 C,  \ level 23
21 C, 85 C, 85 C, 84 C, 68 C, 25 C, 24 C, 17 C, 64 C, 32 C, 
64 C, 1 C, 80 C, 16 C, 33 C, 129 C, 65 C, 129 C, 10 C, 33 C, 
88 C, 64 C, 82 C, 1 C, 64 C, 4 C, 64 C, 129 C, 21 C, 85 C, 
85 C, 84 C, 0 C, 0 C, 0 C, 0 C, 
103 C, 105 C,  \ level 24
85 C, 85 C, 85 C, 85 C, 64 C, 4 C, 0 C, 5 C, 69 C, 136 C, 
1 C, 101 C, 70 C, 0 C, 36 C, 21 C, 74 C, 9 C, 20 C, 1 C, 
70 C, 33 C, 0 C, 81 C, 69 C, 0 C, 69 C, 105 C, 85 C, 85 C, 
85 C, 85 C, 0 C, 0 C, 0 C, 0 C, 
-->





103 C, 105 C,  \ level 25
85 C, 85 C, 85 C, 85 C, 64 C, 0 C, 0 C, 17 C, 72 C, 88 C, 
8 C, 1 C, 64 C, 96 C, 129 C, 65 C, 72 C, 1 C, 65 C, 129 C, 
70 C, 2 C, 64 C, 33 C, 69 C, 132 C, 0 C, 1 C, 85 C, 85 C, 
85 C, 85 C, 0 C, 0 C, 0 C, 0 C, 

DARKSTAR
